***********************************************************************************************
***
***	INTERTEMPORAL EVIDENCE ON THE STRATEGY OF POPULISM IN THE US (Gennaro, Lecce, Morelli)
***	Replication Package
***  
*** Appendix - Table A22
***
***********************************************************************************************



clear
est clear 

* Indicate location of the replication package here
cd "/Replication Package"

clear
est clear 
use "3_data/for_analysis/mobilization_data_2018.dta"


* econ insecurity 
replace economy=. if economy==6

global demo "white male agedec week"
global pers "married rel urbancity" 
global income "educ2" 
global cond "cit1==1 & uncontested==0 & competiti==1"

	
eststo m1: reghdfe core pastinc  if $cond, cl(state#district) a(state#district  $demo $pers $income ) 
eststo m2: reghdfe core unemployed  if $cond, cl(state#district) a(state#district  $demo $pers $income ) 
eststo m3: reghdfe core manu_s  if $cond, cl(state#district) a(state    $demo $pers $income ) 
eststo m4: reghdfe core manu_s pastinc unemployed  if $cond, cl(state#district) a(state  $demo $pers $income ) 



esttab m1 m2 m3 m4  using "4_results/tables/tab20.tex", f label replace booktabs alignment(D{.}{.}{-1}) ///
keep(pastincome unemployed manu_s) s(N r2, fmt(0 2) label("Observations" "R-squared")) ///
nomtitles star(* 0.10 ** 0.05 *** 0.01) r2 b(3) se(3) brac nonotes






